home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1998 April: Mac OS SDK / Dev.CD Apr 98 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Universal / Interfaces / AIncludes / IntlResources.a < prev    next >
Encoding:
Text File  |  1998-02-12  |  18.3 KB  |  414 lines  |  [TEXT/MPS ]

  1. ;
  2. ;    File:        IntlResources.a
  3. ;
  4. ;    Contains:    International Resource definitions.
  5. ;
  6. ;    Version:    Technology:    System 7.5+
  7. ;                Release:    Universal Interfaces 3.1
  8. ;
  9. ;    Copyright:    © 1983-1998 by Apple Computer, Inc., all rights reserved.
  10. ;
  11. ;    Bugs?:        Please include the the file and version information (from above) with
  12. ;                the problem description.  Developers belonging to one of the Apple
  13. ;                developer programs can submit bug reports to:
  14. ;
  15. ;                    devsupport@apple.com
  16. ;
  17. ;
  18.     IF &TYPE('__INTLRESOURCES__') = 'UNDEFINED' THEN
  19. __INTLRESOURCES__ SET 1
  20.  
  21.     IF &TYPE('__MACTYPES__') = 'UNDEFINED' THEN
  22.     include 'MacTypes.a'
  23.     ENDIF
  24.  
  25.  
  26.                                                             ; Bits in the itlcFlags byte 
  27. itlcShowIcon                    EQU        7                    ;Show icon even if only one script
  28. itlcDualCaret                    EQU        6                    ;Use dual caret for mixed direction text
  29.                                                             ; Bits in the itlcSysFlags word 
  30. itlcSysDirection                EQU        15                    ;System direction - left to right/right to left
  31.  
  32. tokLeftQuote                    EQU        1                    ; NumberParts.data[] enumerators                                             
  33. tokRightQuote                    EQU        2                    ;  In general, these are NOT to be considered indices into the data[] array 
  34. tokLeadPlacer                    EQU        3
  35. tokLeader                        EQU        4
  36. tokNonLeader                    EQU        5
  37. tokZeroLead                        EQU        6
  38. tokPercent                        EQU        7
  39. tokPlusSign                        EQU        8
  40. tokMinusSign                    EQU        9
  41. tokThousands                    EQU        10
  42. tokReserved                        EQU        11                    ; 11 is reserved field 
  43. tokSeparator                    EQU        12
  44. tokEscape                        EQU        13
  45. tokDecPoint                        EQU        14
  46. tokEPlus                        EQU        15
  47. tokEMinus                        EQU        16
  48. tokMaxSymbols                    EQU        31
  49. curNumberPartsVersion            EQU        1                    ;current version of NumberParts record
  50.  
  51. currSymLead                        EQU        16
  52. currNegSym                        EQU        32
  53. currTrailingZ                    EQU        64
  54. currLeadingZ                    EQU        128
  55.  
  56. mdy                                EQU        0
  57. dmy                                EQU        1
  58. ymd                                EQU        2
  59. myd                                EQU        3
  60. dym                                EQU        4
  61. ydm                                EQU        5
  62. ; typedef SInt8                         DateOrders
  63.  
  64.  
  65. timeCycle24                        EQU        0                    ;time sequence 0:00 - 23:59
  66. timeCycleZero                    EQU        1                    ;time sequence 0:00-11:59, 0:00 - 11:59
  67. timeCycle12                        EQU        255                    ;time sequence 12:00 - 11:59, 12:00 - 11:59
  68. zeroCycle                        EQU        1                    ;old name for timeCycleZero
  69. longDay                            EQU        0                    ;day of the month
  70. longWeek                        EQU        1                    ;day of the week
  71. longMonth                        EQU        2                    ;month of the year
  72. longYear                        EQU        3                    ;year
  73. supDay                            EQU        1                    ;suppress day of month
  74. supWeek                            EQU        2                    ;suppress day of week
  75. supMonth                        EQU        4                    ;suppress month
  76. supYear                            EQU        8                    ;suppress year
  77. dayLdingZ                        EQU        32
  78. mntLdingZ                        EQU        64
  79. century                            EQU        128
  80. secLeadingZ                        EQU        32
  81. minLeadingZ                        EQU        64
  82. hrLeadingZ                        EQU        128
  83. ;  itl2 header offsets to string comparison hooks 
  84.  
  85. initHook                        EQU        0
  86. fetchHook                        EQU        2
  87. vernierHook                        EQU        4
  88. projectHook                        EQU        6
  89. rsvdHook                        EQU        8
  90. exitHook                        EQU        10
  91. ;Note that the value of itl2FlagsOffset is equal to the value of rsvdHook.
  92. ;In the pre-6.0.4 itl2 format the value at this location was an unused 
  93. ;routine offset. In the itl2 format used with 6.0.4 and later, the value
  94. ;at this location is a flag ($ffff) indicating the new format (i.e., the
  95. ;format that includes the offsets to the tables for LwrString and tables
  96. ;for the simple-script versions of the CharType, Transliterate and FindWord.
  97. ;
  98.  
  99. ;  itl2 header offsets for system 6.0.4 and later 
  100.  
  101. itl2FlagsOffset                    EQU        8
  102. typeListOffset                    EQU        12
  103. classArrayOffset                EQU        14
  104. upperListOffset                    EQU        16
  105. lowerListOffset                    EQU        18
  106. upperNoMarkListOffset            EQU        20
  107. wordTableOffset                    EQU        22
  108. wrapTableOffset                    EQU        24
  109. noMarkListOffset                EQU        26
  110. itl2VersionOffset                EQU        28
  111. itl2FormatOffset                EQU        30
  112. ;  itl2 header offsets for system 7.0 and later 
  113.  
  114. wordTableLen                    EQU        54
  115. wrapTableLen                    EQU        56
  116. findScriptTableOffset            EQU        60
  117. findScriptTableLen                EQU        62
  118. ;  itl2FormatOffset definitions for system 7.0 and later 
  119.  
  120. hdrExtensionsExist                EQU        1
  121. ;  move OffsetTable to QuickdrawText 
  122. Intl0Rec                RECORD 0
  123. decimalPt                 ds.b    1                ; offset: $0 (0)        ; decimal point character
  124. thousSep                 ds.b    1                ; offset: $1 (1)        ; thousands separator character
  125. listSep                     ds.b    1                ; offset: $2 (2)        ; list separator character
  126. currSym1                 ds.b    1                ; offset: $3 (3)        ; currency symbol
  127. currSym2                 ds.b    1                ; offset: $4 (4)
  128. currSym3                 ds.b    1                ; offset: $5 (5)
  129. currFmt                     ds.b    1                ; offset: $6 (6)        ; currency format flags
  130. dateOrder                 ds.b    1                ; offset: $7 (7)        ; order of short date elements: mdy, dmy, etc.
  131. shrtDateFmt                 ds.b    1                ; offset: $8 (8)        ; format flags for each short date element
  132. dateSep                     ds.b    1                ; offset: $9 (9)        ; date separator character
  133. timeCycle                 ds.b    1                ; offset: $A (10)        ; specifies time cycle: 0..23, 1..12, or 0..11
  134. timeFmt                     ds.b    1                ; offset: $B (11)        ; format flags for each time element
  135. mornStr                     ds.b    4                ; offset: $C (12)        ; trailing string for AM if 12-hour cycle
  136. eveStr                     ds.b    4                ; offset: $10 (16)        ; trailing string for PM if 12-hour cycle
  137. timeSep                     ds.b    1                ; offset: $14 (20)        ; time separator character
  138. time1Suff                 ds.b    1                ; offset: $15 (21)        ; trailing string for AM if 24-hour cycle
  139. time2Suff                 ds.b    1                ; offset: $16 (22)
  140. time3Suff                 ds.b    1                ; offset: $17 (23)
  141. time4Suff                 ds.b    1                ; offset: $18 (24)
  142. time5Suff                 ds.b    1                ; offset: $19 (25)        ; trailing string for PM if 24-hour cycle
  143. time6Suff                 ds.b    1                ; offset: $1A (26)
  144. time7Suff                 ds.b    1                ; offset: $1B (27)
  145. time8Suff                 ds.b    1                ; offset: $1C (28)
  146. metricSys                 ds.b    1                ; offset: $1D (29)        ; 255 if metric, 0 if inches etc.
  147. intl0Vers                 ds.w    1                ; offset: $1E (30)        ; region code (hi byte) and version (lo byte)
  148. sizeof                     EQU *                    ; size:   $20 (32)
  149.                         ENDR
  150. ; typedef struct Intl0Rec *                Intl0Ptr
  151.  
  152. ; typedef Intl0Ptr *                    Intl0Hndl
  153.  
  154. Intl1Rec                RECORD 0
  155. days                     ds.b    7 * Str15.sizeof ; offset: $0 (0)        ; day names
  156. months                     ds.b    12 * Str15.sizeof ; offset: $70 (112)    ; month names
  157. suppressDay                 ds.b    1                ; offset: $130 (304)    ; 255 for no day, or flags to suppress any element
  158. lngDateFmt                 ds.b    1                ; offset: $131 (305)    ; order of long date elements
  159. dayLeading0                 ds.b    1                ; offset: $132 (306)    ; 255 for leading 0 in day number
  160. abbrLen                     ds.b    1                ; offset: $133 (307)    ; length for abbreviating names
  161. st0                         ds.b    4                ; offset: $134 (308)    ; separator strings for long date format
  162. st1                         ds.b    4                ; offset: $138 (312)
  163. st2                         ds.b    4                ; offset: $13C (316)
  164. st3                         ds.b    4                ; offset: $140 (320)
  165. st4                         ds.b    4                ; offset: $144 (324)
  166. intl1Vers                 ds.w    1                ; offset: $148 (328)    ; region code (hi byte) and version (lo byte)
  167. localRtn                 ds.w    1                ; offset: $14A (330) <-- really an array of length one ; now a flag for opt extension
  168. sizeof                     EQU *                    ; size:   $14C (332)
  169.                         ENDR
  170. ; typedef struct Intl1Rec *                Intl1Ptr
  171.  
  172. ; typedef Intl1Ptr *                    Intl1Hndl
  173.  
  174. ; fields for optional itl1 extension
  175. Itl1ExtRec                RECORD 0
  176. base                     ds        Intl1Rec        ; offset: $0 (0)        ; un-extended Intl1Rec
  177. version                     ds.w    1                ; offset: $14C (332)
  178. format                     ds.w    1                ; offset: $14E (334)
  179. calendarCode             ds.w    1                ; offset: $150 (336)    ; calendar code for this itl1 resource
  180. extraDaysTableOffset     ds.l    1                ; offset: $152 (338)    ; offset in itl1 to extra days table
  181. extraDaysTableLength     ds.l    1                ; offset: $156 (342)    ; length of extra days table
  182. extraMonthsTableOffset     ds.l    1                ; offset: $15A (346)    ; offset in itl1 to extra months table
  183. extraMonthsTableLength     ds.l    1                ; offset: $15E (350)    ; length of extra months table
  184. abbrevDaysTableOffset     ds.l    1                ; offset: $162 (354)    ; offset in itl1 to abbrev days table
  185. abbrevDaysTableLength     ds.l    1                ; offset: $166 (358)    ; length of abbrev days table
  186. abbrevMonthsTableOffset     ds.l    1                ; offset: $16A (362)    ; offset in itl1 to abbrev months table
  187. abbrevMonthsTableLength     ds.l    1                ; offset: $16E (366)    ; length of abbrev months table
  188. extraSepsTableOffset     ds.l    1                ; offset: $172 (370)    ; offset in itl1 to extra seps table
  189. extraSepsTableLength     ds.l    1                ; offset: $176 (374)    ; length of extra seps table
  190. tables                     ds.w    1                ; offset: $17A (378) <-- really an array of length one ; now a flag for opt extension
  191. sizeof                     EQU *                    ; size:   $17C (380)
  192.                         ENDR
  193. ;  String data structure for itl2 stack frames 
  194. IUStrData                RECORD 0
  195. curChar                     ds.w    1                ; offset: $0 (0)        ;  current character. 
  196. mapChar                     ds.w    1                ; offset: $2 (2)        ;  projected character. 
  197. decChar                     ds.w    1                ; offset: $4 (4)        ;  decision char for weak equality. 
  198. bufChar                     ds.b    1                ; offset: $6 (6)        ;  buffer for expansion. 
  199. justAfter                 ds.b    1                ; offset: $7 (7)        ;  boolean for AE vs ligature-AE, etc. 
  200. ignChar                     ds.b    1                ; offset: $8 (8)        ;  flag: ignore char. 
  201. noFetch                     ds.b    1                ; offset: $9 (9)        ;  flag: no fetch of next. 
  202. strCnt                     ds.w    1                ; offset: $A (10)        ;  length word. 
  203. strPtr                     ds.l    1                ; offset: $C (12)        ;  current ptr to string. 
  204. sizeof                     EQU *                    ; size:   $10 (16)
  205.                         ENDR
  206. ;  Stack from for itl2 sorting hooks (pre System 7) 
  207. IUSortFrame        record    {oldA6},decrement
  208. result            ds.w    1
  209. aStrText        ds.l    1
  210. bStrText        ds.l    1
  211. aStrLen            ds.w    1
  212. bStrLen            ds.w    1
  213. return            ds.l    1
  214. oldA6            ds.l    1
  215. aInfo            ds        IUStrData
  216. bInfo            ds        IUStrData
  217. wantMag            ds.b    1                ; 0 to use primary differences only; else 1
  218. weakEq            ds.b    1                ; Signals at most weak equality.
  219. msLock            ds.b    1                ; (obsolete, not used)
  220. weakMag            ds.b    1                ; -1 to force magnitude result (-1,0,1); else 0
  221. supStorage        ds.b    18                ; extra storage.
  222. weakAPtr        ds.l    1                ; sup. pointer
  223. weakBPtr        ds.l    1                ; sup. pointer
  224. lkSize            equ        *                ; frame size.
  225. paramBytes        equ     aStrText-return
  226.                 endr
  227. ;  Stack from for itl2 sorting hooks (System 7 and later; adds itl2Handle) 
  228. IUNSortFrame    record    {oldA6},decrement
  229. result            ds.w    1
  230. aStrText        ds.l    1
  231. bStrText        ds.l    1
  232. aStrLen            ds.w    1
  233. bStrLen            ds.w    1
  234. return            ds.l    1
  235. oldA6            ds.l    1
  236. aInfo            ds        IUStrData
  237. bInfo            ds        IUStrData
  238. wantMag            ds.b    1                ; 0 to use primary differences only; else 1
  239. weakEq            ds.b    1                ; Signals at most weak equality.
  240. msLock            ds.b    1                ; (obsolete, not used)
  241. weakMag            ds.b    1                ; -1 to force magnitude result (-1,0,1); else 0
  242. supStorage        ds.b    18                ; extra storage.
  243. weakAPtr        ds.l    1                ; sup. pointer
  244. weakBPtr        ds.l    1                ; sup. pointer
  245. itl2Handle        ds.l    1                ; itl2 handle, if supplied
  246. lkSize            equ        *                ; frame size.
  247. paramBytes        equ        aStrText-return
  248.                 endr
  249.  
  250. UntokenTable            RECORD 0
  251. len                         ds.w    1                ; offset: $0 (0)
  252. lastToken                 ds.w    1                ; offset: $2 (2)
  253. index                     ds.w    256                ; offset: $4 (4)        ; index table; last = lastToken
  254. sizeof                     EQU *                    ; size:   $204 (516)
  255.                         ENDR
  256. ; typedef struct UntokenTable *            UntokenTablePtr
  257.  
  258. ; typedef UntokenTablePtr *                UntokenTableHandle
  259.  
  260. WideChar                RECORD 0
  261. char16                     ds.w    1                ; offset: $0 (0)
  262. sizeof                     EQU *                    ; size:   $2 (2)
  263.                         ENDR
  264. WideCharArr                RECORD 0
  265. size                     ds.w    1                ; offset: $0 (0)
  266. data                     ds.b    10 * WideChar.sizeof ; offset: $2 (2)
  267. sizeof                     EQU *                    ; size:   $16 (22)
  268.                         ENDR
  269. NumberParts                RECORD 0
  270. version                     ds.w    1                ; offset: $0 (0)
  271. data                     ds.b    31 * WideChar.sizeof ; offset: $2 (2)    ; index by [tokLeftQuote..tokMaxSymbols]
  272. pePlus                     ds        WideCharArr        ; offset: $40 (64)
  273. peMinus                     ds        WideCharArr        ; offset: $56 (86)
  274. peMinusPlus                 ds        WideCharArr        ; offset: $6C (108)
  275. altNumTable                 ds        WideCharArr        ; offset: $82 (130)
  276. reserved                 ds.b    20                ; offset: $98 (152)
  277. sizeof                     EQU *                    ; size:   $AC (172)
  278.                         ENDR
  279. ; typedef struct NumberParts *            NumberPartsPtr
  280.  
  281.  
  282. Itl4Rec                    RECORD 0
  283. flags                     ds.w    1                ; offset: $0 (0)        ; reserved
  284. resourceType             ds.l    1                ; offset: $2 (2)        ; contains 'itl4'
  285. resourceNum                 ds.w    1                ; offset: $6 (6)        ; resource ID
  286. version                     ds.w    1                ; offset: $8 (8)        ; version number
  287. resHeader1                 ds.l    1                ; offset: $A (10)        ; reserved
  288. resHeader2                 ds.l    1                ; offset: $E (14)        ; reserved
  289. numTables                 ds.w    1                ; offset: $12 (18)        ; number of tables, one-based
  290. mapOffset                 ds.l    1                ; offset: $14 (20)        ; offset to table that maps byte to token
  291. strOffset                 ds.l    1                ; offset: $18 (24)        ; offset to routine that copies canonical string
  292. fetchOffset                 ds.l    1                ; offset: $1C (28)        ; offset to routine that gets next byte of character
  293. unTokenOffset             ds.l    1                ; offset: $20 (32)        ; offset to table that maps token to canonical string
  294. defPartsOffset             ds.l    1                ; offset: $24 (36)        ; offset to default number parts table
  295. resOffset6                 ds.l    1                ; offset: $28 (40)        ; reserved
  296. resOffset7                 ds.l    1                ; offset: $2C (44)        ; reserved
  297. resOffset8                 ds.l    1                ; offset: $30 (48)        ; reserved
  298. sizeof                     EQU *                    ; size:   $34 (52)
  299.                         ENDR
  300. ; typedef struct Itl4Rec *                Itl4Ptr
  301.  
  302. ; typedef Itl4Ptr *                        Itl4Handle
  303.  
  304. ;  New NItl4Rec for System 7.0: 
  305. NItl4Rec                RECORD 0
  306. flags                     ds.w    1                ; offset: $0 (0)        ; reserved
  307. resourceType             ds.l    1                ; offset: $2 (2)        ; contains 'itl4'
  308. resourceNum                 ds.w    1                ; offset: $6 (6)        ; resource ID
  309. version                     ds.w    1                ; offset: $8 (8)        ; version number
  310. format                     ds.w    1                ; offset: $A (10)        ; format code
  311. resHeader                 ds.w    1                ; offset: $C (12)        ; reserved
  312. resHeader2                 ds.l    1                ; offset: $E (14)        ; reserved
  313. numTables                 ds.w    1                ; offset: $12 (18)        ; number of tables, one-based
  314. mapOffset                 ds.l    1                ; offset: $14 (20)        ; offset to table that maps byte to token
  315. strOffset                 ds.l    1                ; offset: $18 (24)        ; offset to routine that copies canonical string
  316. fetchOffset                 ds.l    1                ; offset: $1C (28)        ; offset to routine that gets next byte of character
  317. unTokenOffset             ds.l    1                ; offset: $20 (32)        ; offset to table that maps token to canonical string
  318. defPartsOffset             ds.l    1                ; offset: $24 (36)        ; offset to default number parts table
  319. whtSpListOffset             ds.l    1                ; offset: $28 (40)        ; offset to white space code list
  320. resOffset7                 ds.l    1                ; offset: $2C (44)        ; reserved
  321. resOffset8                 ds.l    1                ; offset: $30 (48)        ; reserved
  322. resLength1                 ds.w    1                ; offset: $34 (52)        ; reserved
  323. resLength2                 ds.w    1                ; offset: $36 (54)        ; reserved
  324. resLength3                 ds.w    1                ; offset: $38 (56)        ; reserved
  325. unTokenLength             ds.w    1                ; offset: $3A (58)        ; length of untoken table
  326. defPartsLength             ds.w    1                ; offset: $3C (60)        ; length of default number parts table
  327. whtSpListLength             ds.w    1                ; offset: $3E (62)        ; length of white space code list
  328. resLength7                 ds.w    1                ; offset: $40 (64)        ; reserved
  329. resLength8                 ds.w    1                ; offset: $42 (66)        ; reserved
  330. sizeof                     EQU *                    ; size:   $44 (68)
  331.                         ENDR
  332. ; typedef struct NItl4Rec *                NItl4Ptr
  333.  
  334. ; typedef NItl4Ptr *                    NItl4Handle
  335.  
  336.  
  337. TableDirectoryRecord    RECORD 0
  338. tableSignature             ds.l    1                ; offset: $0 (0)        ; 4 byte long table name 
  339. reserved                 ds.l    1                ; offset: $4 (4)        ; Reserved for internal use 
  340. tableStartOffset         ds.l    1                ; offset: $8 (8)        ; Table start offset in byte
  341. tableSize                 ds.l    1                ; offset: $C (12)        ; Table size in byte
  342. sizeof                     EQU *                    ; size:   $10 (16)
  343.                         ENDR
  344. Itl5Record                RECORD 0
  345. versionNumber             ds.l    1                ; offset: $0 (0)        ; itl5 resource version number 
  346. numberOfTables             ds.w    1                ; offset: $4 (4)        ; Number of tables it contains 
  347. reserved                 ds.w    3                ; offset: $6 (6)        ; Reserved for internal use 
  348. tableDirectory             ds        TableDirectoryRecord ; offset: $C (12) <-- really an array of length one ; Table directory records 
  349. sizeof                     EQU *                    ; size:   $1C (28)
  350.                         ENDR
  351. RuleBasedTrslRecord        RECORD 0
  352. sourceType                 ds.w    1                ; offset: $0 (0)        ; Transliterate target type for the LHS of the rule 
  353. targetType                 ds.w    1                ; offset: $2 (2)        ; Transliterate target type for the RHS of the rule 
  354. formatNumber             ds.w    1                ; offset: $4 (4)        ; Transliterate resource format number 
  355. propertyFlag             ds.w    1                ; offset: $6 (6)        ; Transliterate property flags 
  356. numberOfRules             ds.w    1                ; offset: $8 (8)        ; Number of rules following this field 
  357. sizeof                     EQU *                    ; size:   $A (10)
  358.                         ENDR
  359.  
  360. ItlcRecord                RECORD 0
  361. itlcSystem                 ds.w    1                ; offset: $0 (0)        ; default system script
  362. itlcReserved             ds.w    1                ; offset: $2 (2)        ; reserved
  363. itlcFontForce             ds.b    1                ; offset: $4 (4)        ; default font force flag
  364. itlcIntlForce             ds.b    1                ; offset: $5 (5)        ; default intl force flag
  365. itlcOldKybd                 ds.b    1                ; offset: $6 (6)        ; MacPlus intl keybd flag
  366. itlcFlags                 ds.b    1                ; offset: $7 (7)        ; general flags
  367. itlcIconOffset             ds.w    1                ; offset: $8 (8)        ; keyboard icon offset; not used in 7.0
  368. itlcIconSide             ds.b    1                ; offset: $A (10)        ; keyboard icon side; not used in 7.0
  369. itlcIconRsvd             ds.b    1                ; offset: $B (11)        ; rsvd for other icon info
  370. itlcRegionCode             ds.w    1                ; offset: $C (12)        ; preferred verXxx code
  371. itlcSysFlags             ds.w    1                ; offset: $E (14)        ; flags for setting system globals
  372. itlcReserved4             ds.b    32                ; offset: $10 (16)        ; for future use
  373. sizeof                     EQU *                    ; size:   $30 (48)
  374.                         ENDR
  375. ItlbRecord                RECORD 0
  376. itlbNumber                 ds.w    1                ; offset: $0 (0)        ; itl0 id number
  377. itlbDate                 ds.w    1                ; offset: $2 (2)        ; itl1 id number
  378. itlbSort                 ds.w    1                ; offset: $4 (4)        ; itl2 id number
  379. itlbFlags                 ds.w    1                ; offset: $6 (6)        ; Script flags
  380. itlbToken                 ds.w    1                ; offset: $8 (8)        ; itl4 id number
  381. itlbEncoding             ds.w    1                ; offset: $A (10)        ; itl5 ID # (optional; char encoding)
  382. itlbLang                 ds.w    1                ; offset: $C (12)        ; current language for script 
  383. itlbNumRep                 ds.b    1                ; offset: $E (14)        ; number representation code
  384. itlbDateRep                 ds.b    1                ; offset: $F (15)        ; date representation code 
  385. itlbKeys                 ds.w    1                ; offset: $10 (16)        ; KCHR id number
  386. itlbIcon                 ds.w    1                ; offset: $12 (18)        ; ID # of SICN or kcs#/kcs4/kcs8 suite.
  387. sizeof                     EQU *                    ; size:   $14 (20)
  388.                         ENDR
  389. ;  New ItlbExtRecord structure for System 7.0 
  390. ItlbExtRecord            RECORD 0
  391. base                     ds        ItlbRecord        ; offset: $0 (0)        ; un-extended ItlbRecord
  392. itlbLocalSize             ds.l    1                ; offset: $14 (20)        ; size of script's local record
  393. itlbMonoFond             ds.w    1                ; offset: $18 (24)        ; default monospace FOND ID
  394. itlbMonoSize             ds.w    1                ; offset: $1A (26)        ; default monospace font size
  395. itlbPrefFond             ds.w    1                ; offset: $1C (28)        ; preferred FOND ID
  396. itlbPrefSize             ds.w    1                ; offset: $1E (30)        ; preferred font size
  397. itlbSmallFond             ds.w    1                ; offset: $20 (32)        ; default small FOND ID
  398. itlbSmallSize             ds.w    1                ; offset: $22 (34)        ; default small font size
  399. itlbSysFond                 ds.w    1                ; offset: $24 (36)        ; default system FOND ID
  400. itlbSysSize                 ds.w    1                ; offset: $26 (38)        ; default system font size
  401. itlbAppFond                 ds.w    1                ; offset: $28 (40)        ; default application FOND ID
  402. itlbAppSize                 ds.w    1                ; offset: $2A (42)        ; default application font size
  403. itlbHelpFond             ds.w    1                ; offset: $2C (44)        ; default Help Mgr FOND ID
  404. itlbHelpSize             ds.w    1                ; offset: $2E (46)        ; default Help Mgr font size
  405. itlbValidStyles             ds.b    1                ; offset: $30 (48)        ; set of valid styles for script
  406. itlbAliasStyle             ds.b    1                ; offset: $31 (49)        ; style (set) to mark aliases
  407. sizeof                     EQU *                    ; size:   $32 (50)
  408.                         ENDR
  409.  
  410.  
  411.     ENDIF ; __INTLRESOURCES__ 
  412.  
  413.